#include "tcpprior.h"

tcpprior
alpha_prior(const tcpalpha elem)
{
	tcpprior ret;
	ret = arista_weight(elem);
return ret;
}

Bool
prior_ord(const tcpprior x, const tcpprior y)
{
	Bool b;
	b = (x<=y);
return b;
}
